home *** CD-ROM | disk | FTP | other *** search
/ Shareware Grab Bag / Shareware Grab Bag.iso / 090 / inkey.arc / DEMO.BAT next >
Encoding:
DOS Batch File  |  1987-10-03  |  1010 b   |  29 lines
  1. ECHO OFF
  2. INKEY !\First Clear the screen...[KEY] to begin;
  3. :start
  4. INKEY @\~[2J
  5. INKEY @/~[5;1H~[31m┌──────────────────────────────────────────────────────────────────────────────┐;
  6. INKEY @/│                                                                              │;
  7. INKEY @/│                                                                              │;
  8. INKEY @/│                                                                              │;
  9. INKEY @/│                                                                              │;
  10. INKEY @/└──────────────────────────────────────────────────────────────────────────────┘;
  11. INKEY @/~[6;36H~[36mDEMO.BAT
  12. INKEY @/~[7;20H[1] Help
  13. INKEY @/~[8;20H[2] Restart
  14. INKEY @/~[9;20H[3] End~[32;40m;
  15. INKEY 123/;
  16. IF ERRORLEVEL=51 GOTO exit
  17. IF ERRORLEVEL=50 GOTO start
  18. IF ERRORLEVEL=49 GOTO help
  19. :help
  20. INKEY @/~[12;1H
  21. INKEY @\You pressed [1]
  22. INKEY !\Press any key for HELP
  23. TYPE INKEY.DOC
  24. INKEY !\[KEY] for menu;
  25. GOTO start
  26. :exit
  27. INKEY @\~[2J
  28.  
  29.